200 |
How can I add the Desktop folder
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "::{00021400-0000-0000-C000-000000000046}>" End With |
199 |
How can I create my own favorites folders
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "::{450d8fba-ad25-11d0-98a8-0800361b1103}|C:\Temp><b>My Projects</b>|" .Expand("C:\Temp") End With |
198 |
How can change the explore from folder (sample 2)
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "C:\>" End With |
197 |
How can change the explore from folder (sample 1)
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "C:\" End With |
196 |
Is it possible to include more system drives as root folders (sample 2)
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "C:\>SYSTEM <off 4><b>1|D:\>SYSTEM <off 4><b>2|E:\>SYSTEM <off 4><b>3" End With |
195 |
Is it possible to include more system drives as root folders (sample 1)
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "C:\|D:\|E:\" End With |
194 |
How can I include a system drive as a root folder, instead lists its content
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "C:\>" End With |
193 |
How can I add the Desktop as a root folder (sample 3, rename, new display name, root)
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}><sha ;;0>This <b>PC</b>" .Expand("::{20D04FE0-3AEA-1069-A2D8-08002B30309D}") End With |
192 |
How can I add the Desktop as a root folder (sample 2)
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = "::{20D04FE0-3AEA-1069-A2D8-08002B30309D}>" .Expand("::{20D04FE0-3AEA-1069-A2D8-08002B30309D}") End With |
191 |
How can I add the Desktop as a root folder (sample 1)
With AxExFileView1 .ExpandFolders = True .ExploreFromHere = ">" .Expand("::{20D04FE0-3AEA-1069-A2D8-08002B30309D}") End With |
190 |
How can I browse the "Public" folder
With AxExFileView1 .ExpandFolders = True .IncludeFilesInFolder = True .ExploreFromHere = "::{4336a54d-038b-4685-ab02-99bb52d3fb8b}>" End With |
189 |
How can I browse the "Libraries" folder
With AxExFileView1 .ExpandFolders = True .IncludeFilesInFolder = True .ExploreFromHere = "::{031E4825-7B94-4dc3-B131-E946B44C8DD5}>" End With |
188 |
How can I browse the "HomeGroup" folder
With AxExFileView1 .ExpandFolders = True .IncludeFilesInFolder = True .ExploreFromHere = "::{B4FB3F98-C1EA-428d-A78A-D1F5659CBA93}>" End With |
187 |
How can I browse the "Games" folder
With AxExFileView1 .ExpandFolders = True .IncludeFilesInFolder = True .ExploreFromHere = "::{ED228FDF-9EA8-4870-83b1-96b02CFE0D52}>" End With |
186 |
How can I browse the "OneDrive" folder
With AxExFileView1 .ExpandFolders = True .IncludeFilesInFolder = True .ExploreFromHere = "::{018D5C66-4533-4307-9B53-224DE2ED1FE6}>" End With |
185 |
How can I browse the "Control Panel" folder
|
184 |
How can I browse the "My Documents"
With AxExFileView1 .IncludeFilesInFolder = True .ExpandFolders = True .ExploreFromHere = "::{450d8fba-ad25-11d0-98a8-0800361b1103}" End With |
183 |
How can I hide all columns, and let just the Name being visible
|
182 |
How can I browse the Printers and Faxes
|
181 |
How can I browse the Network Connections
|
180 |
Is it possible to specify a different selection color, while the control has no focus
With AxExFileView1 .BeginUpdate() .HotBackColor = .SelBackColor .HotForeColor = .SelForeColor .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exSelBackColorHide,15790320) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exSelForeColorHide,65536) .EndUpdate() End With |
179 |
Can I change the visual item's appearance as the mouse pointer passes/hovers over it
With AxExFileView1 .BeginUpdate() .VisualAppearance.Add(1,"gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhkGYYYCgMZRVDiCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASV" & _ "AceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69" & _ "JbwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFo" & _ "iC8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFY" & _ "FoFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJl" & _ "EkRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhuZwJiidocmWCYaGcO4ngmZh6h6Z5JnYfofmeGZMnaHRNAoCgeiGaIKCaCoimiSgkneI5oEoP" & _ "J3DwaRKFaFolmmChmhqJppFOYoeiQaJ4mKIoomoSoWiaKZqgqDoeD4KBKi6KYrmsCpGDgPhrEqNoehIa4KmaOoumuSp2jqLQPhoEpAiCLBLBaRoxmyCwmkYPosksCo0j" & _ "KLQLEaUocmyQ5qEuAomHOVoriCLYbE6Xoxm2OZMk6OJflOFJajmYwzkKQI6m6S42m6O5vAuJgRjyTY1Diao9k2G5mAiPpvkudp5DYZexGsa5AAQBCAg==") .DefaultItemHeight = 20 .FullRowSelect = True .ExploreFromHere = "" .ExpandFolders = True .GetOcx().SelBackColor = &H1ff9933 .SelForeColor = RGB(0,0,0) .GetOcx().HotBackColor = &H1ffcc99 .HotForeColor = .SelForeColor .EndUpdate() End With |
178 |
Can I change the item's background color as the mouse pointer passes/hovers over it
With AxExFileView1 .BeginUpdate() .ExploreFromHere = "" .ExpandFolders = True .HotBackColor = RGB(153,204,255) .HotForeColor = .SelForeColor .EndUpdate() End With |
177 |
How do I programmatically select a folder, giving its full path
With AxExFileView1 .BeginUpdate() .ExploreFromHere = "" .ExpandFolders = True .Expand("C:\Windows\system32") .EndUpdate() End With |
176 |
How do I programmatically select a folder, giving its relative path
With AxExFileView1 .BeginUpdate() .ExploreFromHere = "" .ExpandFolders = True .Expand("C:") .EndUpdate() End With |
175 |
I've came to the situation that while I am using single-selection, I need to be able to select nothing, so no file/folder to be selected. It is possible
' StateChange event - Fired while the control's state has been changed. Private Sub AxExFileView1_StateChange(ByVal sender As System.Object, ByVal e As AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent) Handles AxExFileView1.StateChange With AxExFileView1 Debug.Print( "Click and press CTRL to unselect the file/folder." ) End With End Sub With AxExFileView1 .BeginUpdate() .SingleSel = True .AllowSelectNothing = True .ExploreFromHere = "" .EndUpdate() End With |
174 |
Is it possible to change the color of the selection as soon as the control is losing its focus
With AxExFileView1 .BeginUpdate() .SingleSel = True .ExploreFromHere = "" .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exSelBackColorHide,12895428) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exSelForeColorHide,65536) .EndUpdate() End With |
173 |
Is it possible to hide the control's selecting when the control loses the focus
With AxExFileView1 .BeginUpdate() .SingleSel = True .ExploreFromHere = "" .HideSelection = True .EndUpdate() End With |
172 |
Can I display the folder name only, without other information like size, type, modified...
With AxExFileView1 .BeginUpdate() .SelectOnRelease = True .IncludeParentLabel = "<b><%0%></b>, <fgcolor=808080>...A* folders only" .IncludeFolderFilter = "A*" .ExploreFromHere = "C:\Windows\" .BrowseFolderPath = "C:\Windows\addins" .DisplayFoldersInfo = False .FullRowSelect = True .EndUpdate() End With |
171 |
Recently, I have noticed a small arrow in the right side of each folder, so the question is how can I get ride of that
With AxExFileView1 .BeginUpdate() .SelectOnRelease = True .SingleSel = False .ExploreFromHere = "" .IncludeSubFolderIconKey = 0 .EndUpdate() End With |
170 |
Can I select files/folders when user releases the mouse, rather than clicking it
With AxExFileView1 .BeginUpdate() .SelectOnRelease = True .SingleSel = False .ExploreFromHere = "" .EndUpdate() End With |
169 |
I am using the IncludeParent property. Is there any option so I can display the parent label all the time, no matter if the control is vertically scrolled
With AxExFileView1 .BeginUpdate() .IncludeFolders = True .ExpandFolders = True .IncludeParent = EXFILEVIEWLib.IncludeParentEnum.exIncludeLockedParent .EndUpdate() End With |
168 |
How can I freeze the events, so no event is fired
' StateChange event - Fired while the control's state has been changed. Private Sub AxExFileView1_StateChange(ByVal sender As System.Object, ByVal e As AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent) Handles AxExFileView1.StateChange With AxExFileView1 Debug.Print( "This will ne never fired, until FreezeEvents(False) is called." ) End With End Sub With AxExFileView1 .FreezeEvents(True) .SelectOnRelease = True End With |
167 |
The focusing item does not get marked when selected
With AxExFileView1 .BeginUpdate() .SingleSel = False With .VisualAppearance .Add(1,"gBFLBCJwBAEHhEJAAEhABHoDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASV" & _ "AceAAGaUZrjSgobjmOYhAJCLqhYIgASXJqLaBlOCaAieSc+QhjQJIJoeCZXU5TFg1BTsOhqEqcRiseaRVDCaIJWzbdYWLDdNQHHKYLjnWorbpSJZ5XjNEySDQkMS9PrE" & _ "J7vST8FBCdAABLJUB2BR9RwxRafKpnWwJDpmCaOQLXEB5DK1PyVMTKYrtGy7GrIAJxWxbV4UHh+QABOzIMAvHKJMwvHYcUZne5XVLeF41HbONogPaJZyIAK2cLROq6Xo" & _ "7GEcJZEcLASB4DwvgWUZlE6AQQhKAYkkYdA6hyDIwHgSoqFwQgmnsYxjGgSIiBOTpSEiAwRgOJI7j4JAHA6U5wm0MpPlOBIjD8TZiGYCICiCGAuA6AxhAgMgSgOYQ4DY" & _ "Bg/g6cw1n+ABOmMMJ9DmCwjnScw4RsVJngkYh4hoKIKmKKI2CmC5ikiQgqgiT5jhyMw8g4QwIn0OIKEiCJhD8DwTGyfA7k0WQOEWEQkGkJhIhKZB5DYSoTiSCQEn4PQO" & _ "COXJcCeIJjliaIQk0aRyF4O5llmAhfhgZhJg4ZoYiaAxYn4PZOhOZJaCUZYTiYQw1mcOZUm+HQnHmWh4h6Z4pnYeYfk0eYsmqG4nAgNJ2DqD5DkCWoiGiOgqgyI5omoR" & _ "oNiSaQKFKEojCaM4ugSFhOjkAJcieKgDkaH4oioGoOiaKRqgqEoqDddwyhuAxPgOMJ8DyDZqk6NYtCsapmjiLprHqdo6i+K5K1oPhOlqPgKD4DpjnII4yiOewuk6MxtA" & _ "sMpSjObQ7EaT4wk6ewYn0PgPAiCJkjeLgDk6X44i4G4OmaORuguEpqDkLAzkaWg+E8GIUmaPIvEOVpzj2Lxbl6eo+G+S5in4OYPmOaJyjuTwjnYWpBg6DAjAqQZwkwJw" & _ "NkKcJsEcEJCDBEpaD6Dw8BiapGjGSgfB2RpxmyBwgkicZ8haBw/g+M5TBcPQPlOXJskscp8jsMJMnMLJXDGTZzEyYw2kwMoDlcFw9i2M4/EGUJPg0CxFlENBtCcSJSnQ" & _ "fQ0m+SgPHsaJ7lALZLG6XZVHWDRfFqVY1k0ZxdladYTnifJUGaeAWAeMnSGcGWgBObJ3lWbwdjKW5cHcTZPHaLkN4GxXDlFqFsA4uRbBOGAFAEIzAsDEFOBkfYqR4D6A" & _ "OBEYo8QuBvAmMceInBDgcD0JwOIqQyJ1DMAwG4IANDnHSMoK4QhOgMBGNEIQvQWAdGenETIswGiddsAAQAgCAgA==") End With .GetOcx().SelBackColor = &H1000000 .SelForeColor = RGB(0,0,0) .ShowFocusRect = True .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exShowFocusRect,1) .EndUpdate() End With |
166 |
Can I change the visual appearance of the focused item
With AxExFileView1 .BeginUpdate() .SingleSel = False With .VisualAppearance .Add(1,"gBFLBCJwBAEHhEJAAEhABHoDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASV" & _ "AceAAGaUZrjSgobjmOYhAJCLqhYIgASXJqLaBlOCaAieSc+QhjQJIJoeCZXU5TFg1BTsOhqEqcRiseaRVDCaIJWzbdYWLDdNQHHKYLjnWorbpSJZ5XjNEySDQkMS9PrE" & _ "J7vST8FBCdAABLJUB2BR9RwxRafKpnWwJDpmCaOQLXEB5DK1PyVMTKYrtGy7GrIAJxWxbV4UHh+QABOzIMAvHKJMwvHYcUZne5XVLeF41HbONogPaJZyIAK2cLROq6Xo" & _ "7GEcJZEcLASB4DwvgWUZlE6AQQhKAYkkYdA6hyDIwHgSoqFwQgmnsYxjGgSIiBOTpSEiAwRgOJI7j4JAHA6U5wm0MpPlOBIjD8TZiGYCICiCGAuA6AxhAgMgSgOYQ4DY" & _ "Bg/g6cw1n+ABOmMMJ9DmCwjnScw4RsVJngkYh4hoKIKmKKI2CmC5ikiQgqgiT5jhyMw8g4QwIn0OIKEiCJhD8DwTGyfA7k0WQOEWEQkGkJhIhKZB5DYSoTiSCQEn4PQO" & _ "COXJcCeIJjliaIQk0aRyF4O5llmAhfhgZhJg4ZoYiaAxYn4PZOhOZJaCUZYTiYQw1mcOZUm+HQnHmWh4h6Z4pnYeYfk0eYsmqG4nAgNJ2DqD5DkCWoiGiOgqgyI5omoR" & _ "oNiSaQKFKEojCaM4ugSFhOjkAJcieKgDkaH4oioGoOiaKRqgqEoqDddwyhuAxPgOMJ8DyDZqk6NYtCsapmjiLprHqdo6i+K5K1oPhOlqPgKD4DpjnII4yiOewuk6MxtA" & _ "sMpSjObQ7EaT4wk6ewYn0PgPAiCJkjeLgDk6X44i4G4OmaORuguEpqDkLAzkaWg+E8GIUmaPIvEOVpzj2Lxbl6eo+G+S5in4OYPmOaJyjuTwjnYWpBg6DAjAqQZwkwJw" & _ "NkKcJsEcEJCDBEpaD6Dw8BiapGjGSgfB2RpxmyBwgkicZ8haBw/g+M5TBcPQPlOXJskscp8jsMJMnMLJXDGTZzEyYw2kwMoDlcFw9i2M4/EGUJPg0CxFlENBtCcSJSnQ" & _ "fQ0m+SgPHsaJ7lALZLG6XZVHWDRfFqVY1k0ZxdladYTnifJUGaeAWAeMnSGcGWgBObJ3lWbwdjKW5cHcTZPHaLkN4GxXDlFqFsA4uRbBOGAFAEIzAsDEFOBkfYqR4D6A" & _ "OBEYo8QuBvAmMceInBDgcD0JwOIqQyJ1DMAwG4IANDnHSMoK4QhOgMBGNEIQvQWAdGenETIswGiddsAAQAgCAgA==") .Add(2,"gBFLBCJwBAEHhEJAAEhABeEGACAADACAxRDgMQBQKAAzAJBIYhkGYYYCgMZRUDGCYXABCEYRXBIZQ7BKNIxjSJwFgmEgADDFIBQSLAYROGSDJBGODJDjWGIeQLOEhQH" & _ "IMRxPE6UYLhWYpBDKPYcUbGc7yBBMVwGf59XzACoKSheQIVSDQkw6Fo6NYhAxHALyNRkBy8f60KjtGpodDUJYvW5JYyjBZ8EznOqbJBkeJ7BgOe5NQjaD72VgdWQJFSW" & _ "JajWYYJDOJY2ZAAE5TVINEwxJbDaylChIdxaF6WAzZEBhBYoATPNLBMrhWqKDw2XaQWBCOgwHYeR5LU7BdRwbIrRq2eAAXbcVyXfDddZlBK+QA0SK9lRVTKvJZmKgBWw" & _ "1COSxmAAGw4kcNx1iKFBiCAfQsG8lJemucg7nsXpUHOOxrm+DI3jOH4XAOBx2nscw0j2HhPG4L5uGEVIECQCBCEUAYkGMHQHFGSBlGaAxkEgQgTGCVBsDYQhCgQJZrHK" & _ "UggGEShkFGNgIlsNpPnMHJHD+TADAIJIJiIWIeCqChikiIgmgiD5zHyXxgiACJKCuC4jHiZgtg6I4IlkCQwkwOIonMPJjEkFhGhGZBpA4KoMBCGJuEiE5lAkGg7hMY4J" & _ "EYVoUCUNAOE6FZl0KWQACWOR2GKF5mBmChchkJRZhoXYaCKKYqGuDglEmNhuhWZpIiYc4dCcCRqGmHZlgm2YxAwSQKESHwkFkKgpiAIAIH4PIimOOg2DiChoiQJRRD+T" & _ "ZDHCfwyAyCgyg+JpiioYJ/DgDgIlECQ6lwRAEICA=") .Add(3,"CP:2 -1 0 1 0") End With .GetOcx().SelBackColor = &H1000000 .SelForeColor = RGB(0,0,0) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exShowFocusRect,50331648) .EndUpdate() End With |
165 |
How do I check if an object is a file or folder
|
164 |
How do I get the selected item
' StateChange event - Fired while the control's state has been changed. Private Sub AxExFileView1_StateChange(ByVal sender As System.Object, ByVal e As AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent) Handles AxExFileView1.StateChange With AxExFileView1 Debug.Print( .get_Get(EXFILEVIEWLib.TypeEnum.SelItems).Item(0) ) End With End Sub With AxExFileView1 .BeginUpdate() .ExploreFromHere = "::{00021400-0000-0000-C000-000000000046}" .ExpandFolders = True .IncludeFiles = False .set_ColumnVisible("Size",False) .set_ColumnVisible("Type",False) .set_ColumnVisible("Modified",False) .HeaderVisible = False .ExpandOnDblClk = True .AllowRename = True .EndUpdate() End With |
163 |
How can I browse the "Recycle Bin" folder
|
162 |
How can I browse the "Documents" folder
|
161 |
How can I browse the "Control Panel" folder
With AxExFileView1 .BeginUpdate() .ExploreFromHere = "::{21EC2020-3AEA-1069-A2DD-08002b30309d}" .set_ColumnVisible("Size",False) .set_ColumnVisible("Type",False) .set_ColumnVisible("Modified",False) .EndUpdate() End With |
160 |
How can I simulate the tree part of Windows Explorer
With AxExFileView1 .BeginUpdate() .ExploreFromHere = "::{00021400-0000-0000-C000-000000000046}" .ExpandFolders = True .IncludeFiles = False .set_ColumnVisible("Size",False) .set_ColumnVisible("Type",False) .set_ColumnVisible("Modified",False) .HeaderVisible = False .ExpandOnDblClk = True .EndUpdate() End With |
159 |
How can I browse the Network folder
|
158 |
How can I browse the My Computer
|
157 |
How can I browse the My Network Places folder
|
156 |
How can I browse the Desktop folder
|
155 |
Does your control supports scrolling by touching the screen
|
154 |
Do you have any Fit-To-Page options when printing the control
With AxExFileView1 .BeginUpdate() With .FileTypes.Add("*") .Folder = True .StrikeOut = True .Apply() End With .EndUpdate() With CreateObject("Exontrol.Print") .Options = "FitToPage = On" .PrintExt = AxExFileView1.GetOcx() .Preview() End With End With |
153 |
Is it possible to expand all folder
With AxExFileView1 .BeginUpdate() .ExploreFromHere = "C:\Program Files\Microsoft.NET" .ExpandFolders = True .Expand("*") .EndUpdate() End With |
152 |
How can I provide my own context menu
' StateChange event - Fired while the control's state has been changed. Private Sub AxExFileView1_StateChange(ByVal sender As System.Object, ByVal e As AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent) Handles AxExFileView1.StateChange With AxExFileView1 Debug.Print( "State " ) Debug.Print( e.state ) Debug.Print( "ContextMenu" ) Debug.Print( .ShowContextMenu ) .ShowContextMenu = "Item 1[id=1][def],Item 2[id=2],[sep][id=3],Popup[id=4](Item 3[id=5],Item 4[id=6])" Debug.Print( "ExecuteContextMenu" ) Debug.Print( .ExecuteContextMenu ) End With End Sub |
151 |
Is it possible to prevent executing a specific command from the object's context menu
' StateChange event - Fired while the control's state has been changed. Private Sub AxExFileView1_StateChange(ByVal sender As System.Object, ByVal e As AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent) Handles AxExFileView1.StateChange With AxExFileView1 Debug.Print( "State " ) Debug.Print( e.state ) Debug.Print( "ContextMenu" ) Debug.Print( .ShowContextMenu ) Debug.Print( "ExecuteContextMenu" ) Debug.Print( .ExecuteContextMenu ) .ExecuteContextMenu = 0 End With End Sub |
150 |
How can I disable the Delete command from the object's context menu
' StateChange event - Fired while the control's state has been changed. Private Sub AxExFileView1_StateChange(ByVal sender As System.Object, ByVal e As AxEXFILEVIEWLib._IExFileViewEvents_StateChangeEvent) Handles AxExFileView1.StateChange With AxExFileView1 Debug.Print( "State " ) Debug.Print( e.state ) Debug.Print( "ContextMenu" ) Debug.Print( .ShowContextMenu ) .ShowContextMenu = .FormatABC("value replace `&Delete` with `&Delete[dis]`",.ShowContextMenu) End With End Sub |
149 |
How can I change the label to be displayed in the parent folder
With AxExFileView1 .IncludeParent = True .IncludeParentLabel = "<b><%0%>" .ExploreFromHere = "C:\" .BrowseFolderPath = "C:\Temp" End With |
148 |
How can I change the +/- button's images (method 2)
With AxExFileView1 .BeginUpdate() With .VisualAppearance .Add(1,"gBFLBCJwBAEHhEJAEGg4BCwCg6AADACAxRDAMgBQKAAzQFAYahmG6GAAGEZhYgmFgAQhFcZQSKUOQTDKMIziaQIRDINQlSTJcQjKKEUQTFiXIyAKKwEgmEQMQiCcbzX" & _ "IUBxAAqXZZFUaKAg2Qg4TLBAzUTCQbR7HieQghGoqPpWF4gAhCJQGSYZaDqOQyRhkCC4DIITZkRbTUBiRSdWx8AAMIyiGpoJbudjyXg6V5OTblez9P7AMBvS6nKrhcp2" & _ "PrhTSYWr+Gp5R7IMhyLI8Uw/DS/Yq1GDYIiuOoIQhCUD0LQ9EyXJqnaJnaC5aiuCT7VRjWDYFgFdTpQC8bZuGz7Trmd59XTadhYHSsAyNRDCL6tayLDxSZabZ5aOa6Ho" & _ "HEuJIxmOL50HgBAWgmDpEGGLJWAqbwPg+RZkH+eg9D4TxfhuRZeGGdwQH2PQTCmDpFFaKoVB+D5Xmed5pHoX44AWfR+F8UwVnEdpdkMMJKDIChygyIQpAoEh4iIJ5Jlg" & _ "TIcH+XoIFoEwnGEAh6A0KBgiMIICHdLgIlAM4MlKAIcCaIYIjYLoLGKIhqCcMxiSAJQ1A0IxEhsJgJFiPg+guI4yFYOA0GMWIUloNhNGIaIXCUI5CE4SwkEkchMhGCxl" & _ "BkQIUCQZJZCiFIRk0aQVH8IBmAOBJeDcZJYmyFgnAmAhaGaCxmGmIhqhoZJZgiXYYAgFgCHQOYOFOEITCQCJpCyEoTVaNoACUZJiFCEoekiaZgmSHQXlYEh0DuDpTjCD" & _ "QiEgchAg0IpJBoXoZiYKYqHaHAimkYguhMIZpAOMh0GEGBmg6JYqmkGowmyK4rAqNoyDsGg2BmCApCuAgNh8agrkqdYkGea4ChGCBAEAgIA==") .Add(2,"gBFLBCJwBAEHhEJAEGg4BDACg6AADACAxRDAMgBQKAAzQFAYahmG6GAAGEZhYgmFgAQhFcZQSKUOQTDKMIziaQIRDINQlSTJcQjKKEUQTFiXIyAKKwEgmEQMQiCcbzX" & _ "IUBxAAqXZZFUaKAg2Qg4TLBAzUTCQbR7HieQghGoqPpWF4gAhCJQGSYZaDqOQyRhkCC4DIITZkRbTUBiRSdWx8AAMIyiGpoJbudjyXg6V5OTblez9P7AMBvS6nKrhcp2" & _ "PrhTSYWr+Gp5R7IMhyLI8Uw/DS/Yq1GDYIiuOoIQhCUD0LQ9EyXJqnaJnaC5aiuCT7VRjWDYFgFdTpQC8bZuGz7Trmd59XTadhYHSsAyNRDCL6tayLDxSZabZ5aOa6Ho" & _ "HEuJIxmOL50HgBAWgmDpEGGLJWAqbwPg+RZknOeY9D4XxfHmB5cEGdp0EyJg7BUWoqFQfY/B8f5PnOd5+H6IAHkyRR7l2NxwkwMoMgKHIjCgShCgSHgogmch2BAJwhDg" & _ "VIfgUIQYDSHoCgoGAckgIIdkgFICDQDJjDSIAnAmI5+CqCpikiNgugqYhyGoJAzGIAgKCINQNCMRIbCYCRYj4PoPmOMhWDgNBjFiCJaDYTRiGiFwlCOQhOEsJBJHIThQ" & _ "hSJQZE4UAlAkGQ2EoJQkHMWhFF+SAZgSYQ3g2WQ2DsJYJkIYIWhmZpJioZ4aGaOYqE2GJNlmBIBGAJxjhiZQ5AkMhAg6nwpDaAglEkOgOgWIQoAmdIOh6DhJlkfRhWQO" & _ "JtDsCJSCSBwkXSLIRiYaY6GqHInmmYguhgIppFIHoSDsJxmBGBhomoeo2hOK4OkqQoyiuaxDjGIxhhiAoSjoIJZnaIo+i+WhGH6OgpBiBAEIC") End With .HasCheckBox = EXFILEVIEWLib.CheckBoxEnum.PartialCheckBox .ExpandFolders = True .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphOpen,16777216) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphClose,33554432) .Indent = 19 .EndUpdate() End With |
147 |
How can I change the +/- button's images (method 1)
With AxExFileView1 .BeginUpdate() .LoadIconsKey = 1234 .LoadIcons("gBJJgBAICAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _ "lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1BfeBf7ywj/dWHf7pxWJxeKdOMx+OyGTyWVxeHdWDwuBfb/zmaeWGxGWyON02l1GU" & _ "0+izOE0Ofv9J1z/am1f6/3D/Xm73W83a83vA3/B4nD4283C/2m22ez2rU2+54/C33V6nX4vW6PK5+gf+xpGYf6V8j/QiEQr/Qfr9Xs9aD9vw9/x+nz+3s8/p8iV1n9/b" & _ "zPQ+r3QG+UCQFAsEQA/TyvE8Cjsk/J/mOYZgn+YBel1CxeQyYENw1DkPQ7EERw/C0MQlCkFNUx8IwnCsLxJEUSxlGkQxtDkTxdFTJQcozJPmYhhOUW5aFif8iFlI5aST" & _ "JElSZJcnSjJsiSNILlPm0j6StJUjSnKEvSfMMpS/Ip/y3LDFx6orJEE9hjmIYZ/lmWBXTlOk7TrOc6ooik9TxP8/TfOM2vhLNCQlOFATvP1GUXR080fP9BH/Q8eTUoc2" & _ "PYZRjmKf5WlUVFPVBUVQ0/UM+IhU1SVXVVN07SrV0PV1WVHVVbVrXFS1zVdZ1gx9L0wxZBTaf5mGUZB/lOUZQn+UhQk8f5RE+Ttok+TlUIhaVr2lalnWhZVmWNZFh0LW" & _ "NiXFZNl2bZ9q2pbVq23a14Xbddv3VdFyMnYChTZYZ/mgZxmn+UBOE1bGD4RhGCYNgGBWGQUV0pf2G4HguE4vjGF3/gOJYhS19p/fuIGoaRon+TZMP5jGV2xlD+ZJk2H4" & _ "jmWYZPlOWZwimXNpkuO31kGQ2FfxtGyax/k0S5KH/lJJn/pJI6cSeoYOS+pacSmoaZo+kn/omjZlQ2h6Lrela1p+o6hqu06ttWr6ySum6RpWvZ9j+gJ4yRA70f5wm8bu" & _ "l7hmxLH+ThMcHlHB4PxHCcNwXAabvu/70QOI8nvm/cfx3C8PxvF89xvN8drXIn/y27bunW872cxynIf5JkgR2rklzOtYPrWzEp2nYdl1nXdM1fLd91/Y9n2vA9x5Hlab" & _ "pPd+L4fgV/1CePFyx3Hadh/kaRJDn+SBGkWf5I/B8XyfH8Pz/L9Hye/8Pt+76/s8s8Xq73+Pte573zf39f+/U/99r+H4PYdK3tBr0ydmzPm/eBkBIGvZgeP+CME4CHzO" & _ "aYWBcDoNQQg3BKDsFIOQhPobOBBOzPikhQeo86B4WH3QTC4+sK4UCkM8YKE8KRBwrhhDtA0PIXwyhSbCEpOSLA+JXEYjxICREkAASUlETicEQiHFMpxAQ") .HasCheckBox = EXFILEVIEWLib.CheckBoxEnum.CheckBox .ExpandFolders = True .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphOpen,1234) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exTreeGlyphClose,1235) .Indent = 19 .EndUpdate() End With |
146 |
How can I change the check box button's images (method 2)
With AxExFileView1 .BeginUpdate() .LoadIconsKey = 1234 .LoadIcons("gBJJgBAICAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _ "lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1JJuBAGBJuDwWEw2FxGLw+Nws8xmKx2JymRyuCv9dy2byecyWfyk0z2X0Gj0eZqmW" & _ "LmrADE1wAfexmuxfet15e3Gkluq1muYmw2U02m23+4L261FPyzJ5lF5jJ5Er5fNonP6PJpmW4dE4eWlna4MzYfjACi80t7uT7HrorR9wALXxABW+gAYv33fq9n7njb/w" & _ "ANWLj5vq+grAAMUEAAdcFpQ7z+KRBylQjBr9JUc8LgAMkNQA1hFQ9AcDQKAA+RI4DawnB6iRQo8VozFoADZGIADhGgAHDG6UFXHUQR4UkfAAacgwzDcUxYyZ8yQoskHy" & _ "68KNBJaUExKQAHvKqYlvLEeREZsuSpK0iqMyxlzGosxmXJqNzFMigGDNoACxOEDwTBZ1zBMLJjBPIAOsnjrTyME0I0y0/z26idn7RFCug+ItAAP1Hx5O0VM7SjS0q3TE" & _ "NFS7TUuPtPAAeFQgAWNSTfOMRUlI1LVXTFLshTdYVZTKNRFVFU1upVbVxXdeK+iwfJXYCPJAkSSAAkqUWQnCIV6mxgAfZ6NkAA9po2A5B2ujYPnHbdtHGDwxo2h5+Bnc" & _ "R/nwCaNh+eYYAHdR5hjdyNW2CZB28D5ho2B5hgeYNpWpZQAWeYAE3Mf5+4Mf6NoCA") .HasCheckBox = EXFILEVIEWLib.CheckBoxEnum.CheckBox .ExpandFolders = True .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exCheckBoxState0,1234) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exCheckBoxState1,1235) .EndUpdate() End With |
145 |
Is it possible to show the entire line when selecting files or folders
With AxExFileView1 .FullRowSelect = True End With |
144 |
How do I enable the scrollbar-extension, as thumb to be shown outside of the control's client area
With AxExFileView1 .BeginUpdate() .set_ScrollPartVisible(EXFILEVIEWLib.ScrollBarEnum.exVScroll,EXFILEVIEWLib.ScrollPartEnum.exExtentThumbPart,True) .set_ScrollPartVisible(EXFILEVIEWLib.ScrollBarEnum.exHScroll,EXFILEVIEWLib.ScrollPartEnum.exExtentThumbPart,True) .set_ScrollPartVisible(&H2,EXFILEVIEWLib.ScrollPartEnum.exExtentThumbPart,True) .ScrollWidth = 4 .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exVSBack,15790320) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exVSThumb,8421504) .ScrollHeight = 4 .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exHSBack,.get_Background(EXFILEVIEWLib.BackgroundPartEnum.exVSBack)) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exHSThumb,.get_Background(EXFILEVIEWLib.BackgroundPartEnum.exVSThumb)) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exScrollSizeGrip,.get_Background(EXFILEVIEWLib.BackgroundPartEnum.exVSBack)) .EndUpdate() End With |
143 |
How can I change the check box button's images (method 1)
With AxExFileView1 .BeginUpdate() With .VisualAppearance .Add(1,"gBFLBCJwBAEHhEJAEGg4BgsHQAAYAQGKIYBkAKBQAGaAoDDYMwzQwAAxDMKEEwsACEIrjKCRShyCYZRhGcTSBCIZBqEqSZLiEZRQiiCYsS5GQBSFDcOwHGyQYDkCQpA" & _ "AWL4tCyNc7QHKFAxnAgaaLAAYRVjSH5OAADcI1FLUEyUf6sAArB74XiCIAIQiUBomGahajkMoYZAAaDCCI2a4aDZCIoVHalKgxC5oKSqCJqbptMZ/HrgJQYGRuC4NQ7C" & _ "cDKDATbr9MZ9ZBCNZoPimEYtS7MMLyRB8QpyAytaBhRaaGwmSr3U7Oc50d69FYTIxcYZoCq1XBOGYMZLcNR3La9YYnBqMbRAeJYNped6NSDVcKxLgaa4fTrOZZzHL9Hp" & _ "viMWYBnWOr+kwJ4zlqY53CAZQ/B4GZzmab5qHyT4cDeDInkwPp8DCTI/h+Iw7nMZZhj4B5eGKL57gYGAgAadZoG8sgBgYfxKjcSRYCCYJGGYDoDmCQgNh0ZIZAaSB2gW" & _ "YJ2F4FwdhsJpuBQfRiAWdQJEAQCAg") .Add(2,"gBFLBCJwBAEHhEJAEGg4BVUMQAAYAQGKIYBkAKBQAGaAoDDYMwzQwAAxDMKEEwsACEIrjKCRShyCYZRhGcTSBCIZBqEqSZLiEZRQiiCYsS5GQBSFDcOwHGyQYDkCQpA" & _ "AWL4tCyNc7QHKFAxnAgaaLAAYRVjSH5OAADcI1FLUEyUf6sAArB74XiCIAIQiUBomGahajkMoYZAAaDCCI2a4aDZCIoVHalKgxC5oKSqCJqbptMZ/HrgJQYGRuC4NQ7C" & _ "cDKDATbr9MZ9ZBCNZoPimEYtS7MMLQXK8QpyAytaBhRaaGwmSr3U7Oc50d69FYQXqvYZoCq1XBOGYMZLcNR3La9YYnBqMbRAeJYNpedy2YbkFC5LStHwbCrBVpxWotDx" & _ "QjWVgrHYGI9iybhbiGUo+jafA6DKZxjkoVgxHoHR+iqXx2jMA52l8XJ/CMJ5TkaCp7nmOwHk+XovmECR8BWMYyAIHAgEOBgGFaSo4CWeQVgoSA0lOA5fEGEZQBSYRGBi" & _ "eYFlWMhiBoPZhkabI3geYIzDYIoHA8dxAH2CZYGMLgqHeW4zAYLgWCMB4gGIeoOjcQgJCqWBhgIOhvGKRhAn2D5blcWBaB+JBGi2EhWAgOQlhmEpYgiHB9DwJQCloUgW" & _ "mUQoOFaEZXlaSB2haZJGF4WwdhsJRslmGJGDmFhYg8ZoHBiZYalCFAEIC") End With .HasCheckBox = EXFILEVIEWLib.CheckBoxEnum.PartialCheckBox .ExpandFolders = True .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exCheckBoxState0,16777216) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exCheckBoxState1,33554432) .set_Background(EXFILEVIEWLib.BackgroundPartEnum.exCheckBoxState2,47708146) .EndUpdate() End With |
142 |
Is it possible to displays only KB, MB, GB when case, so with no Bytes
|
141 |
Is it possible to displays Bytes, KB, MB, GB when case
|
140 |
Is it possible to displays Bytes combined with Mega-Bytes(MB) in the Size column
|
139 |
Is it possible to displays Giga-Bytes(GB) only in the Size column
|
138 |
Is it possible to displays Mega-Bytes(MB) only in the Size column
|
137 |
Is it possible to displays Kilo-Bytes(KB) only in the Size column
|
136 |
Is it possible to displays Bytes only in the Size column
|
135 |
How can I simulate a go back or navigating to the parent folder
' Click event - Occurs when the user clicks the list. Private Sub AxExFileView1_ClickEvent(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AxExFileView1.ClickEvent With AxExFileView1 .BrowseFolderPath = ".." End With End Sub With AxExFileView1 .BrowseFolderPath = "C:\Program Files" End With |
134 |
Does your control support runtime filter
With AxExFileView1 .BeginUpdate() .set_ColumnFilterButton("Name",True) .AddColumnCustomFilter("Name","All Project Files (*.sln, *.dsw)","*.sln|*.dsw") .AddColumnCustomFilter("Name","Solution Files (*.sln)","*.sln") .AddColumnCustomFilter("Name","Compatible Workspace Files (*.dsw)","*.dsw") .set_FilterBarDropDownWidth("Name",-212) .set_ColumnFilterButton("Type",True) .set_FilterBarDropDownWidth("Type",-128) .set_ColumnFilterButton("Modified",True) .EndUpdate() End With |
133 |
How can I reffer a folder or a file, without using the wild characters
With AxExFileView1 With .FileTypes.Add("TEMP") .HasPattern = False .Folder = True .Bold = True .Apply() End With End With |
132 |
How do I change the text being diplayed in the Type column for specified files or folders
With AxExFileView1 With .FileTypes.Add("*.bat") .Folder = False .Type = "__newtype__" .Apply() End With End With |
131 |
How do I change the text being diplayed in the Type column for specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = False .Type = "__newtype__" .Apply() End With End With |
130 |
How do I change the text being diplayed in the Type column for specified files or folders
With AxExFileView1 With .FileTypes.Add("W*") .Folder = True .Type = "__newtype__" .Apply() End With End With |
129 |
How do I change the text being diplayed in the Type column for specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = True .Type = "__newtype__" .Apply() End With End With |
128 |
How do I underline specified files or folders
With AxExFileView1 With .FileTypes.Add("*.bat") .Folder = False .Underline = True .Apply() End With End With |
127 |
How do I underline specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = False .Underline = True .Apply() End With End With |
126 |
How do I underline specified files or folders
With AxExFileView1 With .FileTypes.Add("W*") .Folder = True .Underline = True .Apply() End With End With |
125 |
How do I underline specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = True .Underline = True .Apply() End With End With |
124 |
How do I draw as strikeout specified files or folders
With AxExFileView1 With .FileTypes.Add("*.bat") .Folder = False .StrikeOut = True .Apply() End With End With |
123 |
How do I draw as strikeout specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = False .StrikeOut = True .Apply() End With End With |
122 |
How do I draw as strikeout specified files or folders
With AxExFileView1 With .FileTypes.Add("W*") .Folder = True .StrikeOut = True .Apply() End With End With |
121 |
How do I draw as strikeout specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = True .StrikeOut = True .Apply() End With End With |
120 |
How do I draw as italic specified files or folders
With AxExFileView1 With .FileTypes.Add("*.bat") .Folder = False .Italic = True .Apply() End With End With |
119 |
How do I draw as italic specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = False .Italic = True .Apply() End With End With |
118 |
How do I draw as italic specified files or folders
With AxExFileView1 With .FileTypes.Add("W*") .Folder = True .Italic = True .Apply() End With End With |
117 |
How do I draw as italic specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = True .Italic = True .Apply() End With End With |
116 |
How do I bold specified files or folders
With AxExFileView1 With .FileTypes.Add("*.bat") .Folder = False .Bold = True .Apply() End With End With |
115 |
How do I bold specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = False .Bold = True .Apply() End With End With |
114 |
How do I bold specified files or folders
With AxExFileView1 With .FileTypes.Add("W*") .Folder = True .Bold = True .Apply() End With End With |
113 |
How do I bold specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = True .Bold = True .Apply() End With End With |
112 |
How do I change the background color for specified files or folders
With AxExFileView1 With .FileTypes.Add("*.bat") .Folder = False .BackColor = RGB(255,0,0) .Apply() End With End With |
111 |
How do I change the background color for specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = False .BackColor = RGB(255,0,0) .Apply() End With End With |
110 |
How do I change the background color for specified files or folders
With AxExFileView1 With .FileTypes.Add("W*") .Folder = True .BackColor = RGB(255,0,0) .Apply() End With End With |
109 |
How do I change the background color for specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = True .BackColor = RGB(255,0,0) .Apply() End With End With |
108 |
How do I change the foreground color for specified files or folders
With AxExFileView1 With .FileTypes.Add("*.bat") .Folder = False .ForeColor = RGB(255,0,0) .Apply() End With End With |
107 |
How do I change the foreground color for specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = False .ForeColor = RGB(255,0,0) .Apply() End With End With |
106 |
How do I change the foreground color for specified files or folders
With AxExFileView1 With .FileTypes.Add("W*") .Folder = True .ForeColor = RGB(255,0,0) .Apply() End With End With |
105 |
How do I change the foreground color for specified files or folders
With AxExFileView1 With .FileTypes.Add("*") .Folder = True .ForeColor = RGB(255,0,0) .Apply() End With End With |
104 |
How do I get the count of all items
Dim var_Count With AxExFileView1 var_Count = .get_Get(EXFILEVIEWLib.TypeEnum.VisibleItems).Count End With |
103 |
How do I get the count oc checked items
Dim var_Count With AxExFileView1 .HasCheckBox = EXFILEVIEWLib.CheckBoxEnum.CheckBox var_Count = .get_Get(EXFILEVIEWLib.TypeEnum.CheckItems).Count End With |
102 |
How do I get the count of all items
Dim var_Count With AxExFileView1 var_Count = .get_Get(EXFILEVIEWLib.TypeEnum.AllItems).Count End With |
101 |
How do I get the selected folder
Dim var_Count With AxExFileView1 var_Count = .get_Get(EXFILEVIEWLib.TypeEnum.SelItems).Count End With |